include<ub.scad> // v.gd/ubaer

scale=1.5;

spiel1=0.5/scale;

Scissor();

pos=55;








module Scissor()Col(3)
{
    intersection(){
        union(){
            scale(scale){//DGlied1(l1=40,l2=40,la=+0.5);
                rotate(pos )intersection(){
                 Doppelkopf();
                 T(0,16)cube(50*2,center=true);
                 }
            }

            
            rotate(90-pos*0) scale(scale)DGlied0(l1=40,l2=40,la=-0.5,spiel=spiel1);
        }
      rotate(45)T(30)  cylinder(50,d=150,center=true);
    }
    
    rotate(-pos *0)T(-53)T(z=1)difference(){minkowski(){
        cylinder(5.5,d=6);
        sphere(1);
    }cylinder(20,d=3.5,center=true);}
    rotate(90+pos)T(-53)T(z=1)difference(){minkowski(){
        cylinder(5.5,d=6);
        sphere(1);
    }cylinder(20,d=3.5,center=true);} 
 
 
 
//T(0,sin(-pos)*+30)
Col(3)  Drehpunkt(rz=-3+pos/2,x=+60)  Anschlussplatte();
 
  
    
}

module Anschlussplatte(schieb=-27.5-(scale*5*-1)){
   rotate(-45)T(0,47)difference(){
     T(-26,-1)Box(110,10,7.5); 
       T(-50.0+schieb,-5.0)Linear(e=12,s=0,es=scale*5)scale(scale) {
           cylinder(20,d=3.2,center=true);
        T(z=2.5)  Mklon(tz=0.8)Kegel(d1=5.0,d2=3,name=0);
        T(z=2.5)   scale([1.3,1,1])Pille(2.5,d=5,rad=.5,fn2=6);//cylinder(2,d=5,center=true);
       }
       
       T(+2.5-scale*5+schieb,2.1,l(-1))Linear(e=12,es=scale*5,s=0,center=true)cylinder(20,d=3.5,center=false);//verbindungslöcher
       
      
     
 }
 T(60) scale(scale)difference(){
          rotate(+23)Glied(l=25,spiel=spiel1);
          T(17.4,-10,-5)rotate(45)cube(50);
          }
T(52.7,12.4) rotate(80)Box(10.5,z=7.5,eck=3); 
}

module Doppelkopf(){
  Mklon(ty=+0.00001,mz=0)T(0,20)Mklon(ty=-10.0,mz=0)Halb(1,x=1,z=0)T(0,-5)  Glied(l=35,la=-1.5,fn=20);
    
    
    
}